home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / lang / fortran / yaf77-1.1 / yaf77-1 / yaf77 / F77ext / iand.c < prev    next >
Encoding:
Text File  |  1996-01-15  |  100 b   |  10 lines

  1. int iand_ (a,b)
  2. int *a;
  3. int *b;
  4. {
  5.     static int res;
  6.     
  7.     res = (*a & *b);
  8.     return (res);
  9. }
  10.